/ Compute! Gazette 1994 July / 1994-07a.d64 / beginner basic

< prev

next >

view JSON data

view as text

open on a Mac

open on a PC

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 25 42 45 47 49 4e 4e | 45 52 20 42 41 53 49 43 |.%BEGINN|ER BASIC|
|00000010| 3a 20 52 0f 15 0e 04 09 | 0e 07 1f 1f 42 19 20 4c |: R.....|....B. L|
|00000020| 01 12 12 19 20 43 0f 14 | 14 0f 0e 1f 1f 1f 4f 0e |.... C..|......O.|
|00000030| 05 20 0f 06 20 14 08 05 | 20 03 08 01 0c 0c 05 0e |. .. ...| .......|
|00000040| 07 05 13 20 49 20 07 01 | 16 05 20 19 0f 15 20 0c |... I ..|.. ... .|
|00000050| 01 13 14 20 4e 0f 16 05 | 0d 02 05 12 20 17 01 13 |... N...|.... ...|
|00000060| 20 14 0f 20 13 15 02 0d | 09 14 20 01 20 08 0f 0d | .. ....|.. . ...|
|00000070| 05 07 12 0f 17 0e 20 10 | 12 0f 07 12 01 0d 20 14 |...... .|...... .|
|00000080| 08 01 14 20 15 14 09 0c | 09 1a 05 13 20 0e 15 0d |... ....|.... ...|
|00000090| 02 05 12 20 12 0f 15 0e | 04 09 0e 07 2e 20 57 05 |... ....|..... W.|
|000000a0| 0c 0c 2c 20 14 08 05 20 | 10 12 0f 07 12 01 0d 13 |.., ... |........|
|000000b0| 20 01 12 05 20 09 0e 2c | 20 14 08 05 20 16 0f 14 | ... ..,| ... ...|
|000000c0| 05 13 20 01 12 05 20 14 | 01 0c 0c 09 05 04 2c 20 |.. ... .|......, |
|000000d0| 01 0e 04 20 14 08 05 20 | 17 09 0e 0e 05 12 20 09 |... ... |...... .|
|000000e0| 13 20 28 09 0e 13 05 12 | 14 20 04 12 15 0d 12 0f |. (.....|. ......|
|000000f0| 0c 0c 20 08 05 12 05 29 | 20 52 05 18 20 4d 05 12 |.. ....)| R.. M..|
|00000100| 12 09 14 14 2e 20 52 05 | 18 20 13 05 0e 14 20 0d |..... R.|. .... .|
|00000110| 05 20 01 20 10 12 0f 07 | 12 01 0d 20 14 08 01 14 |. . ....|... ....|
|00000120| 20 0e 0f 14 20 0f 0e 0c | 19 20 12 0f 15 0e 04 13 | ... ...|. ......|
|00000130| 20 04 0f 0c 0c 01 12 13 | 20 01 0e 04 20 03 05 0e | .......| ... ...|
|00000140| 14 13 2c 20 02 15 14 20 | 09 14 20 01 0c 13 0f 20 |.., ... |.. .... |
|00000150| 10 0c 01 03 05 13 20 14 | 08 05 20 06 09 07 15 12 |...... .|.. .....|
|00000160| 05 13 20 09 0e 20 0e 05 | 01 14 20 03 0f 0c 15 0d |.. .. ..|.. .....|
|00000170| 0e 13 20 01 14 20 14 08 | 05 20 05 04 07 05 20 0f |.. .. ..|. .... .|
|00000180| 06 20 14 08 05 20 13 03 | 12 05 05 0e 2e 1f 1f 41 |. ... ..|.......A|
|00000190| 13 20 19 0f 15 20 10 12 | 0f 02 01 02 0c 19 20 0b |. ... ..|...... .|
|000001a0| 0e 0f 17 2c 20 14 0f 20 | 12 0f 15 0e 04 20 01 20 |..., .. |..... . |
|000001b0| 0e 15 0d 02 05 12 20 09 | 13 20 14 0f 20 13 08 0f |...... .|. .. ...|
|000001c0| 12 14 05 0e 20 09 14 20 | 14 0f 20 01 20 0d 0f 12 |.... .. |.. . ...|
|000001d0| 05 20 0d 01 0e 01 07 05 | 01 02 0c 05 20 13 09 1a |. ......|.... ...|
|000001e0| 05 2e 20 49 06 20 01 20 | 0d 01 14 08 05 0d 01 14 |.. I. . |........|
|000001f0| 09 03 01 0c 20 03 01 0c | 03 15 0c 01 14 09 0f 0e |.... ...|........|
|00000200| 20 10 12 0f 04 15 03 05 | 13 20 01 20 0e 15 0d 02 | .......|. . ....|
|00000210| 05 12 20 13 15 03 08 20 | 01 13 20 33 34 2e 33 36 |.. .... |.. 34.36|
|00000220| 34 33 37 2c 20 17 05 20 | 03 01 0e 20 12 0f 15 0e |437, .. |... ....|
|00000230| 04 20 09 14 20 14 0f 20 | 01 0e 19 20 0c 05 13 13 |. .. .. |... ....|
|00000240| 05 12 20 04 05 07 12 05 | 05 20 0f 06 20 01 03 03 |.. .....|. .. ...|
|00000250| 15 12 01 03 19 20 17 05 | 20 17 09 13 08 2e 1f 1f |..... ..| .......|
|00000260| 49 06 20 17 05 20 17 01 | 0e 14 20 14 0f 20 12 0f |I. .. ..|.. .. ..|
|00000270| 15 0e 04 20 01 20 0e 15 | 0d 02 05 12 20 14 0f 20 |... . ..|.... .. |
|00000280| 14 17 0f 20 04 05 03 09 | 0d 01 0c 20 10 0c 01 03 |... ....|... ....|
|00000290| 05 13 2c 20 17 05 20 0c | 0f 0f 0b 20 01 14 20 14 |.., .. .|... .. .|
|000002a0| 08 05 20 14 08 09 12 04 | 20 04 09 07 09 14 20 14 |.. .....| ..... .|
|000002b0| 0f 20 14 08 05 20 12 09 | 07 08 14 20 0f 06 20 14 |. ... ..|... .. .|
|000002c0| 08 05 20 04 05 03 09 0d | 01 0c 20 10 0f 09 0e 14 |.. .....|.. .....|
|000002d0| 2d 2d 09 0e 20 14 08 09 | 13 20 03 01 13 05 2c 20 |--.. ...|. ...., |
|000002e0| 34 2d 2d 01 0e 04 20 03 | 0f 0d 10 01 12 05 20 09 |4--... .|...... .|
|000002f0| 14 20 14 0f 20 35 2e 20 | 49 06 20 14 08 05 20 0e |. .. 5. |I. ... .|
|00000300| 15 0d 02 05 12 20 09 13 | 20 05 11 15 01 0c 20 14 |..... ..| ..... .|
|00000310| 0f 20 0f 12 20 07 12 05 | 01 14 05 12 20 14 08 01 |. .. ...|.... ...|
|00000320| 0e 20 35 2c 20 14 08 05 | 20 04 09 07 09 14 20 14 |. 5, ...| ..... .|
|00000330| 0f 20 09 14 13 20 0c 05 | 06 14 20 28 36 20 09 0e |. ... ..|.. (6 ..|
|00000340| 20 14 08 09 13 20 03 01 | 13 05 29 20 09 13 20 09 | .... ..|..) .. .|
|00000350| 0e 03 12 05 01 13 05 04 | 20 02 19 20 31 2e 20 49 |........| .. 1. I|
|00000360| 06 20 14 08 05 20 05 18 | 01 0d 09 0e 05 04 20 04 |. ... ..|...... .|
|00000370| 09 07 09 14 20 09 13 20 | 0c 05 13 13 20 14 08 01 |.... .. |.... ...|
|00000380| 0e 20 35 20 28 01 13 20 | 09 0e 20 14 08 09 13 20 |. 5 (.. |.. .... |
|00000390| 05 18 01 0d 10 0c 05 29 | 2c 20 14 08 05 20 0e 15 |.......)|, ... ..|
|000003a0| 0d 02 05 12 20 14 0f 20 | 09 14 13 20 0c 05 06 14 |.... .. |... ....|
|000003b0| 20 09 13 20 0e 0f 14 20 | 03 08 01 0e 07 05 04 2e | .. ... |........|
|000003c0| 20 54 08 15 13 2c 20 33 | 34 2e 33 36 34 33 37 20 | T..., 3|4.36437 |
|000003d0| 12 0f 15 0e 04 05 04 20 | 14 0f 20 14 17 0f 20 04 |....... |.. ... .|
|000003e0| 05 03 09 0d 01 0c 20 10 | 0c 01 03 05 13 20 02 05 |...... .|..... ..|
|000003f0| 03 0f 0d 05 13 20 33 34 | 2e 33 36 2e 1f 1f 54 0f |..... 34|.36...T.|
|00000400| 20 12 0f 15 0e 04 20 0e | 15 0d 02 05 12 13 20 09 | ..... .|...... .|
|00000410| 0e 20 42 41 53 49 43 2c | 20 17 05 20 15 13 05 20 |. BASIC,| .. ... |
|00000420| 14 08 05 20 49 4e 54 20 | 28 09 0e 14 05 07 05 12 |... INT |(.......|
|00000430| 29 20 03 0f 0d 0d 01 0e | 04 20 01 0e 04 20 12 01 |) ......|. ... ..|
|00000440| 09 13 05 20 01 20 0e 15 | 0d 02 05 12 20 14 0f 20 |... . ..|.... .. |
|00000450| 01 20 10 0f 17 05 12 2e | 20 44 0f 0e 27 14 20 0c |. ......| D..'. .|
|00000460| 05 14 20 14 08 01 14 20 | 13 03 01 12 05 20 19 0f |.. .... |..... ..|
|00000470| 15 2e 20 52 01 09 13 09 | 0e 07 20 01 20 0e 15 0d |.. R....|.. . ...|
|00000480| 02 05 12 20 14 0f 20 01 | 20 10 0f 17 05 12 20 13 |... .. .| ..... .|
|00000490| 09 0d 10 0c 19 20 0d 05 | 01 0e 13 20 14 0f 20 0d |..... ..|... .. .|
|000004a0| 15 0c 14 09 10 0c 19 20 | 14 08 05 20 0e 15 0d 02 |....... |... ....|
|000004b0| 05 12 20 02 19 20 09 14 | 13 05 0c 06 20 01 20 03 |.. .. ..|.... . .|
|000004c0| 05 12 14 01 09 0e 20 0e | 15 0d 02 05 12 20 0f 06 |...... .|..... ..|
|000004d0| 20 14 09 0d 05 13 2e 20 | 54 0f 20 12 01 09 13 05 | ...... |T. .....|
|000004e0| 20 35 20 14 0f 20 14 08 | 05 20 13 05 03 0f 0e 04 | 5 .. ..|. ......|
|000004f0| 20 10 0f 17 05 12 2c 20 | 0d 15 0c 14 09 10 0c 19 | ....., |........|
|00000500| 20 35 20 18 20 35 20 14 | 0f 20 07 05 14 20 32 35 | 5 . 5 .|. ... 25|
|00000510| 2e 20 54 0f 20 12 01 09 | 13 05 20 38 20 14 0f 20 |. T. ...|.. 8 .. |
|00000520| 14 08 05 20 14 08 09 12 | 04 20 10 0f 17 05 12 2c |... ....|. .....,|
|00000530| 20 0d 15 0c 14 09 10 0c | 19 20 38 20 18 20 38 20 | .......|. 8 . 8 |
|00000540| 18 20 38 20 14 0f 20 07 | 05 14 20 35 31 32 2e 1f |. 8 .. .|.. 512..|
|00000550| 1f 54 08 05 20 07 05 0e | 05 12 01 0c 20 06 0f 12 |.T.. ...|.... ...|
|00000560| 0d 15 0c 01 20 06 0f 12 | 20 12 0f 15 0e 04 09 0e |.... ...| .......|
|00000570| 07 2d 2d 01 0e 04 20 14 | 08 05 20 0f 0e 05 20 52 |.--... .|.. ... R|
|00000580| 05 18 20 15 13 05 04 20 | 09 0e 20 08 09 13 20 10 |.. .... |.. ... .|
|00000590| 12 0f 07 12 01 0d 2d 2d | 03 01 0e 20 02 05 20 05 |......--|... .. .|
|000005a0| 18 10 12 05 13 13 05 04 | 20 02 19 20 14 08 09 13 |........| .. ....|
|000005b0| 20 0c 09 0e 05 20 0f 06 | 20 03 0f 04 05 2e 1f 1f | .... ..| .......|
|000005c0| 52 3d 49 4e 54 28 4e 2a | 31 30 1e 44 2b 2e 35 29 |R=INT(N*|10.D+.5)|
|000005d0| 2f 31 30 1e 44 1f 1f 52 | 20 09 13 20 14 08 05 20 |/10.D..R| .. ... |
|000005e0| 12 0f 15 0e 04 05 04 20 | 0e 15 0d 02 05 12 20 14 |....... |...... .|
|000005f0| 08 01 14 20 17 05 20 13 | 05 05 0b 2c 20 4e 20 09 |... .. .|..., N .|
|00000600| 13 20 14 08 05 20 0e 15 | 0d 02 05 12 20 14 0f 20 |. ... ..|.... .. |
|00000610| 12 0f 15 0e 04 2c 20 01 | 0e 04 20 44 20 09 13 20 |....., .|.. D .. |
|00000620| 14 08 05 20 0e 15 0d 02 | 05 12 20 0f 06 20 04 05 |... ....|.. .. ..|
|00000630| 03 09 0d 01 0c 20 10 0c | 01 03 05 13 20 14 0f 20 |..... ..|.... .. |
|00000640| 17 08 09 03 08 20 14 0f | 20 12 0f 15 0e 04 20 09 |..... ..| ..... .|
|00000650| 14 2e 20 48 05 12 05 27 | 13 20 01 20 0d 09 0e 09 |.. H...'|. . ....|
|00000660| 0d 01 0c 09 13 14 20 12 | 0f 15 0e 04 09 0e 07 20 |...... .|....... |
|00000670| 10 12 0f 07 12 01 0d 2e | 1f 1f 31 30 20 50 52 49 |........|..10 PRI|
|00000680| 4e 54 22 1b 43 4c 52 1d | 22 1f 32 30 20 50 52 49 |NT".CLR.|".20 PRI|
|00000690| 4e 54 3a 49 4e 50 55 54 | 22 20 4e 55 4d 42 45 52 |NT:INPUT|" NUMBER|
|000006a0| 20 54 4f 20 52 4f 55 4e | 44 22 3b 4e 1f 33 30 20 | TO ROUN|D";N.30 |
|000006b0| 50 52 49 4e 54 3a 49 4e | 50 55 54 22 20 54 4f 20 |PRINT:IN|PUT" TO |
|000006c0| 48 4f 57 20 4d 41 4e 59 | 20 50 4c 41 43 45 53 22 |HOW MANY| PLACES"|
|000006d0| 3b 44 1f 34 30 20 52 3d | 49 4e 54 28 4e 2a 31 30 |;D.40 R=|INT(N*10|
|000006e0| 1e 44 2b 2e 35 29 2f 31 | 30 1e 44 1f 35 30 20 50 |.D+.5)/1|0.D.50 P|
|000006f0| 52 49 4e 54 3a 50 52 49 | 4e 54 52 1f 1f 1f 52 15 |RINT:PRI|NTR...R.|
|00000700| 0e 20 14 08 05 20 10 12 | 0f 07 12 01 0d 20 01 0e |. ... ..|..... ..|
|00000710| 04 20 05 0e 14 05 12 20 | 34 35 33 2e 35 36 37 35 |. ..... |453.5675|
|00000720| 35 32 20 01 14 20 14 08 | 05 20 06 09 12 13 14 20 |52 .. ..|. ..... |
|00000730| 10 12 0f 0d 10 14 20 01 | 0e 04 20 33 20 01 14 20 |...... .|.. 3 .. |
|00000740| 14 08 05 20 13 05 03 0f | 0e 04 2e 20 57 08 01 14 |... ....|... W...|
|00000750| 20 04 0f 05 13 20 14 08 | 05 20 10 12 0f 07 12 01 | .... ..|. ......|
|00000760| 0d 20 04 0f 20 17 09 14 | 08 20 14 08 05 13 05 20 |. .. ...|. ..... |
|00000770| 0e 15 0d 02 05 12 13 3f | 20 59 0f 15 20 0d 01 19 |.......?| Y.. ...|
|00000780| 20 12 05 03 01 0c 0c 20 | 06 12 0f 0d 20 10 12 05 | ...... |.... ...|
|00000790| 16 09 0f 15 13 20 03 0f | 0c 15 0d 0e 13 20 14 08 |..... ..|..... ..|
|000007a0| 01 14 20 14 08 05 12 05 | 27 13 20 01 0e 20 0f 12 |.. .....|'. .. ..|
|000007b0| 04 05 12 20 0f 06 20 0d | 01 14 08 20 0f 10 05 12 |... .. .|... ....|
|000007c0| 01 14 09 0f 0e 13 2e 20 | 48 05 12 05 27 13 20 14 |....... |H...'. .|
|000007d0| 08 05 20 0f 12 04 05 12 | 20 09 0e 20 17 08 09 03 |.. .....| .. ....|
|000007e0| 08 20 0f 10 05 12 01 14 | 09 0f 0e 13 20 01 12 05 |. ......|.... ...|
|000007f0| 20 10 05 12 06 0f 12 0d | 05 04 2e 1f 1f 31 2e 20 | .......|.....1. |
|00000800| 50 01 12 05 0e 14 08 05 | 13 05 13 1f 32 2e 20 52 |P.......|....2. R|
|00000810| 01 09 13 09 0e 07 20 01 | 20 0e 15 0d 02 05 12 20 |...... .| ...... |
|00000820| 14 0f 20 01 20 10 0f 17 | 05 12 1f 33 2e 20 4d 15 |.. . ...|...3. M.|
|00000830| 0c 14 09 10 0c 09 03 01 | 14 09 0f 0e 1f 34 2e 20 |........|.....4. |
|00000840| 44 09 16 09 13 09 0f 0e | 1f 35 2e 20 41 04 04 09 |D.......|.5. A...|
|00000850| 14 09 0f 0e 1f 36 2e 20 | 53 15 02 14 12 01 03 14 |.....6. |S.......|
|00000860| 09 0f 0e 1f 1f 1f 4f 15 | 12 20 12 0f 15 0e 04 09 |......O.|. ......|
|00000870| 0e 07 20 06 0f 12 0d 15 | 0c 01 20 17 09 0c 0c 20 |.. .....|.. .... |
|00000880| 02 05 20 05 18 05 03 15 | 14 05 04 20 09 0e 20 14 |.. .....|... .. .|
|00000890| 08 05 20 01 02 0f 16 05 | 20 0f 12 04 05 12 2c 20 |.. .....| ....., |
|000008a0| 13 0f 20 0c 05 14 27 13 | 20 01 14 14 01 03 0b 20 |.. ...'.| ...... |
|000008b0| 14 08 05 20 10 01 12 05 | 0e 14 08 05 13 05 13 20 |... ....|....... |
|000008c0| 06 09 12 13 14 2e 1f 1f | 28 4e 2a 31 30 1e 44 2b |........|(N*10.D+|
|000008d0| 2e 35 29 1f 1f 57 09 14 | 08 09 0e 20 14 08 05 20 |.5)..W..|... ... |
|000008e0| 10 01 12 05 0e 14 08 05 | 13 05 13 2c 20 06 09 12 |........|..., ...|
|000008f0| 13 14 20 14 08 05 20 31 | 30 20 17 09 0c 0c 20 02 |.. ... 1|0 .... .|
|00000900| 05 20 12 01 09 13 05 04 | 20 14 0f 20 14 08 05 20 |. ......| .. ... |
|00000910| 10 0f 17 05 12 20 0f 06 | 20 44 20 28 31 30 20 17 |..... ..| D (10 .|
|00000920| 09 0c 0c 20 02 05 20 0d | 15 0c 14 09 10 0c 09 05 |... .. .|........|
|00000930| 04 20 02 19 20 09 14 13 | 05 0c 06 20 44 20 14 09 |. .. ...|... D ..|
|00000940| 0d 05 13 29 2e 20 53 09 | 0e 03 05 20 14 08 05 20 |...). S.|... ... |
|00000950| 16 01 0c 15 05 20 06 0f | 12 20 44 20 09 0e 20 0f |..... ..|. D .. .|
|00000960| 15 12 20 05 18 01 0d 10 | 0c 05 20 09 13 20 33 2c |.. .....|.. .. 3,|
|00000970| 20 31 30 20 17 09 0c 0c | 20 02 05 20 0d 15 0c 14 | 10 ....| .. ....|
|00000980| 09 10 0c 09 05 04 20 02 | 19 20 09 14 13 05 0c 06 |...... .|. ......|
|00000990| 20 14 08 12 05 05 20 14 | 09 0d 05 13 3b 20 09 14 | ..... .|....; ..|
|000009a0| 20 02 05 03 0f 0d 05 13 | 20 31 30 20 58 20 31 30 | .......| 10 X 10|
|000009b0| 20 58 20 31 30 20 0f 12 | 20 31 30 30 30 2e 20 54 | X 10 ..| 1000. T|
|000009c0| 08 05 0e 20 14 08 05 20 | 0d 15 0c 14 09 10 0c 09 |... ... |........|
|000009d0| 03 01 14 09 0f 0e 20 17 | 09 14 08 09 0e 20 14 08 |...... .|..... ..|
|000009e0| 05 20 10 01 12 05 0e 14 | 08 05 13 05 13 20 14 01 |. ......|..... ..|
|000009f0| 0b 05 13 20 10 0c 01 03 | 05 3a 20 34 35 33 2e 35 |... ....|.: 453.5|
|00000a00| 36 37 35 35 32 20 58 20 | 31 30 30 30 20 3d 20 34 |67552 X |1000 = 4|
|00000a10| 35 33 35 36 37 2e 35 35 | 32 2e 1f 1f 57 05 27 12 |53567.55|2...W.'.|
|00000a20| 05 20 13 14 09 0c 0c 20 | 09 0e 13 09 04 05 20 14 |. ..... |...... .|
|00000a30| 08 05 20 10 01 12 05 0e | 14 08 05 13 05 13 2e 20 |.. .....|....... |
|00000a40| 4e 0f 17 20 17 05 20 01 | 04 04 20 2e 35 20 14 0f |N.. .. .|.. .5 ..|
|00000a50| 20 34 35 33 35 36 37 2e | 35 35 32 20 14 0f 20 07 | 453567.|552 .. .|
|00000a60| 05 14 20 34 35 33 35 36 | 38 2e 30 35 32 2e 20 4e |.. 45356|8.052. N|
|00000a70| 0f 17 20 01 10 10 0c 19 | 20 49 4e 54 20 14 0f 20 |.. .....| INT .. |
|00000a80| 14 08 01 14 20 0e 15 0d | 02 05 12 2e 20 52 05 0d |.... ...|.... R..|
|00000a90| 05 0d 02 05 12 20 14 08 | 01 14 20 49 4e 54 20 13 |..... ..|.. INT .|
|00000aa0| 09 0d 10 0c 19 20 04 12 | 0f 10 13 20 01 0c 0c 20 |..... ..|... ... |
|00000ab0| 04 05 03 09 0d 01 0c 20 | 10 0c 01 03 05 13 20 14 |....... |...... .|
|00000ac0| 0f 20 0c 05 01 16 05 20 | 01 20 17 08 0f 0c 05 20 |. ..... |. ..... |
|00000ad0| 0e 15 0d 02 05 12 2e 20 | 49 0e 20 14 08 09 13 20 |....... |I. .... |
|00000ae0| 05 18 01 0d 10 0c 05 20 | 09 14 27 13 20 34 35 33 |....... |..'. 453|
|00000af0| 35 36 38 2e 20 4f 15 12 | 20 06 0f 12 0d 15 0c 01 |568. O..| .......|
|00000b00| 20 08 01 13 20 0e 0f 17 | 20 02 05 05 0e 20 12 05 | ... ...| .... ..|
|00000b10| 04 15 03 05 04 20 14 0f | 20 14 08 09 13 2e 1f 1f |..... ..| .......|
|00000b20| 52 3d 34 35 33 35 36 38 | 2f 31 30 1e 44 1f 1f 57 |R=453568|/10.D..W|
|00000b30| 08 01 14 27 13 20 0e 05 | 18 14 3f 20 44 09 16 09 |...'. ..|..? D...|
|00000b40| 04 09 0e 07 20 02 19 20 | 31 30 3f 20 4f 12 20 04 |.... .. |10? O. .|
|00000b50| 09 16 09 04 09 0e 07 20 | 02 19 20 31 30 1e 44 3f |....... |.. 10.D?|
|00000b60| 20 52 05 0d 05 0d 02 05 | 12 20 06 12 0f 0d 20 14 | R......|. .... .|
|00000b70| 08 05 20 0f 12 04 05 12 | 20 0f 06 20 0f 10 05 12 |.. .....| .. ....|
|00000b80| 01 14 09 0f 0e 20 14 08 | 01 14 20 10 0f 17 05 12 |..... ..|.. .....|
|00000b90| 13 20 01 12 05 20 03 0f | 0d 10 15 14 05 04 20 06 |. ... ..|...... .|
|00000ba0| 09 12 13 14 2e 20 54 08 | 05 12 05 06 0f 12 05 2c |..... T.|.......,|
|00000bb0| 20 12 01 09 13 05 20 31 | 30 20 14 0f 20 14 08 05 | ..... 1|0 .. ...|
|00000bc0| 20 14 08 09 12 04 20 10 | 0f 17 05 12 20 01 07 01 | ..... .|.... ...|
|00000bd0| 09 0e 20 14 0f 20 07 05 | 14 20 31 30 30 30 2e 20 |.. .. ..|. 1000. |
|00000be0| 4e 0f 17 20 0f 15 12 20 | 06 0f 12 0d 15 0c 01 20 |N.. ... |....... |
|00000bf0| 09 13 20 12 05 04 15 03 | 05 04 20 14 0f 20 14 08 |.. .....|.. .. ..|
|00000c00| 09 13 2e 1f 1f 52 3d 34 | 35 33 35 36 38 2f 31 30 |.....R=4|53568/10|
|00000c10| 30 30 1f 1f 44 09 16 09 | 04 09 0e 07 20 02 19 20 |00..D...|.... .. |
|00000c20| 31 30 30 30 20 19 09 05 | 0c 04 13 20 34 35 33 2e |1000 ...|... 453.|
|00000c30| 35 36 38 2c 20 17 08 09 | 03 08 20 13 08 0f 15 0c |568, ...|.. .....|
|00000c40| 04 20 08 01 16 05 20 02 | 05 05 0e 20 14 08 05 20 |. .... .|... ... |
|00000c50| 12 05 13 15 0c 14 20 0f | 06 20 12 15 0e 0e 09 0e |...... .|. ......|
|00000c60| 07 20 14 08 05 20 10 12 | 0f 07 12 01 0d 20 01 0e |. ... ..|..... ..|
|00000c70| 04 20 05 0e 14 05 12 09 | 0e 07 20 14 08 05 20 14 |. ......|.. ... .|
|00000c80| 17 0f 20 13 15 07 07 05 | 13 14 05 04 20 16 01 0c |.. .....|.... ...|
|00000c90| 15 05 13 2e 20 4c 09 0e | 05 20 35 30 20 10 12 09 |.... L..|. 50 ...|
|00000ca0| 0e 14 13 20 14 08 05 20 | 01 0e 13 17 05 12 2e 1f |... ... |........|
|00000cb0| 1f 54 12 19 20 05 0e 14 | 05 12 09 0e 07 20 16 01 |.T.. ...|..... ..|
|00000cc0| 12 09 0f 15 13 20 0e 15 | 0d 02 05 12 13 20 01 0e |..... ..|..... ..|
|00000cd0| 04 20 12 0f 15 0e 04 09 | 0e 07 20 14 08 05 0d 20 |. ......|.. .... |
|00000ce0| 14 0f 20 04 09 06 06 05 | 12 05 0e 14 20 04 05 03 |.. .....|.... ...|
|00000cf0| 09 0d 01 0c 20 10 0c 01 | 03 05 13 2e 20 49 06 20 |.... ...|.... I. |
|00000d00| 19 0f 15 20 14 19 10 05 | 20 01 20 16 01 0c 15 05 |... ....| . .....|
|00000d10| 20 06 0f 12 20 44 20 07 | 12 05 01 14 05 12 20 14 | ... D .|...... .|
|00000d20| 08 01 0e 20 14 08 05 20 | 0e 15 0d 02 05 12 20 0f |... ... |...... .|
|00000d30| 06 20 04 05 03 09 0d 01 | 0c 20 10 0c 01 03 05 13 |. ......|. ......|
|00000d40| 2c 20 19 0f 15 20 0d 01 | 19 20 07 05 14 20 01 0e |, ... ..|. ... ..|
|00000d50| 20 0f 16 05 12 06 0c 0f | 17 20 05 12 12 0f 12 2e | .......|. ......|
|00000d60| 1f 1f 44 0f 0e 27 14 20 | 03 0f 0e 06 15 13 05 20 |..D..'. |....... |
|00000d70| 12 0f 15 0e 04 09 0e 07 | 20 01 20 0e 15 0d 02 05 |........| . .....|
|00000d80| 12 20 17 09 14 08 20 06 | 09 0e 04 09 0e 07 20 09 |. .... .|...... .|
|00000d90| 14 13 20 09 0e 14 05 07 | 05 12 20 16 01 0c 15 05 |.. .....|.. .....|
|00000da0| 2e 20 52 0f 15 0e 04 09 | 0e 07 20 15 13 15 01 0c |. R.....|.. .....|
|00000db0| 0c 19 20 0c 05 01 16 05 | 13 20 04 05 03 09 0d 01 |.. .....|. ......|
|00000dc0| 0c 20 10 0c 01 03 05 13 | 2c 20 01 0e 04 20 01 20 |. ......|, ... . |
|00000dd0| 10 01 12 14 09 03 15 0c | 01 12 20 04 09 07 09 14 |........|.. .....|
|00000de0| 20 0d 01 19 20 09 0e 03 | 12 05 01 13 05 20 02 19 | ... ...|..... ..|
|00000df0| 20 31 2e 20 46 09 0e 04 | 09 0e 07 20 01 20 0e 15 | 1. F...|... . ..|
|00000e00| 0d 02 05 12 27 13 20 09 | 0e 14 05 07 05 12 20 16 |....'. .|...... .|
|00000e10| 01 0c 15 05 20 0a 15 13 | 14 20 04 12 0f 10 13 20 |.... ...|. ..... |
|00000e20| 14 08 05 20 04 09 07 09 | 14 13 20 01 06 14 05 12 |... ....|.. .....|
|00000e30| 20 14 08 05 20 04 05 03 | 09 0d 01 0c 2c 20 0c 05 | ... ...|...., ..|
|00000e40| 01 16 09 0e 07 20 01 20 | 17 08 0f 0c 05 20 0e 15 |..... . |..... ..|
|00000e50| 0d 02 05 12 2e 20 48 05 | 12 05 20 01 12 05 20 13 |..... H.|.. ... .|
|00000e60| 0f 0d 05 20 05 18 01 0d | 10 0c 05 13 2e 1f 1f 2a |... ....|.......*|
|00000e70| 20 31 30 2e 35 38 33 20 | 12 0f 15 0e 04 05 04 20 | 10.583 |....... |
|00000e80| 14 0f 20 0f 0e 05 20 10 | 0c 01 03 05 20 09 13 20 |.. ... .|.... .. |
|00000e90| 31 30 2e 36 2e 1f 2a 20 | 54 08 05 20 09 0e 14 05 |10.6..* |T.. ....|
|00000ea0| 07 05 12 20 16 01 0c 15 | 05 20 0f 06 20 31 30 2e |... ....|. .. 10.|
|00000eb0| 35 38 33 20 09 13 20 31 | 30 2e 1f 2a 20 31 30 2e |583 .. 1|0..* 10.|
|00000ec0| 35 38 33 20 12 0f 15 0e | 04 05 04 20 14 0f 20 01 |583 ....|... .. .|
|00000ed0| 20 17 08 0f 0c 05 20 0e | 15 0d 02 05 12 20 28 1a | ..... .|..... (.|
|00000ee0| 05 12 0f 20 04 05 03 09 | 0d 01 0c 20 10 0c 01 03 |... ....|... ....|
|00000ef0| 05 13 29 20 09 13 20 31 | 31 2e 1f 1f 54 08 05 20 |..) .. 1|1...T.. |
|00000f00| 15 13 05 13 20 06 0f 12 | 20 12 0f 15 0e 04 09 0e |.... ...| .......|
|00000f10| 07 20 01 12 05 20 16 01 | 12 09 05 04 2c 20 02 15 |. ... ..|...., ..|
|00000f20| 14 20 10 12 0f 02 01 02 | 0c 19 20 0f 0e 05 20 0f |. ......|.. ... .|
|00000f30| 06 20 14 08 05 20 0d 0f | 13 14 20 03 0f 0d 0d 0f |. ... ..|.. .....|
|00000f40| 0e 20 09 13 20 09 0e 20 | 04 05 01 0c 09 0e 07 20 |. .. .. |....... |
|00000f50| 17 09 14 08 20 0d 0f 0e | 05 19 2e 20 53 09 0e 03 |.... ...|... S...|
|00000f60| 05 20 09 0e 20 41 0d 05 | 12 09 03 01 20 17 05 20 |. .. A..|.... .. |
|00000f70| 15 13 15 01 0c 0c 19 20 | 12 0f 15 0e 04 20 14 0f |....... |..... ..|
|00000f80| 20 14 17 0f 20 10 0c 01 | 03 05 13 20 28 08 15 0e | ... ...|... (...|
|00000f90| 04 12 05 04 14 08 13 20 | 0f 06 20 01 20 04 0f 0c |....... |.. . ...|
|00000fa0| 0c 01 12 2c 20 0f 12 20 | 03 05 0e 14 13 29 2c 20 |..., .. |.....), |
|00000fb0| 17 05 20 03 01 0e 20 13 | 10 05 03 09 01 0c 09 1a |.. ... .|........|
|00000fc0| 05 20 0f 15 12 20 12 0f | 15 0e 04 09 0e 07 20 06 |. ... ..|...... .|
|00000fd0| 0f 12 0d 15 0c 01 2e 20 | 1f 1f 53 14 01 12 14 20 |....... |..S.... |
|00000fe0| 17 09 14 08 20 14 08 09 | 13 20 05 11 15 01 14 09 |.... ...|. ......|
|00000ff0| 0f 0e 2e 1f 1f 52 3d 49 | 4e 54 28 4e 2a 31 30 1e |.....R=I|NT(N*10.|
|00001000| 44 2b 2e 35 29 2f 31 30 | 1e 44 1f 1f 53 15 02 13 |D+.5)/10|.D..S...|
|00001010| 14 09 14 15 14 05 20 32 | 20 28 14 17 0f 20 04 05 |...... 2| (... ..|
|00001020| 03 09 0d 01 0c 20 10 0c | 01 03 05 13 29 20 06 0f |..... ..|....) ..|
|00001030| 12 20 44 2e 1f 1f 52 3d | 49 4e 54 28 4e 2a 31 30 |. D...R=|INT(N*10|
|00001040| 1e 32 2b 2e 35 29 2f 31 | 30 1e 32 1f 1f 52 01 09 |.2+.5)/1|0.2..R..|
|00001050| 13 05 20 31 30 20 14 0f | 20 14 08 05 20 13 05 03 |.. 10 ..| ... ...|
|00001060| 0f 0e 04 20 10 0f 17 05 | 12 2c 20 0f 12 20 13 11 |... ....|., .. ..|
|00001070| 15 01 12 05 20 31 30 2c | 20 17 08 09 03 08 20 19 |.... 10,| ..... .|
|00001080| 09 05 0c 04 13 20 14 08 | 05 20 06 0f 0c 0c 0f 17 |..... ..|. ......|
|00001090| 09 0e 07 2e 1f 1f 52 3d | 49 4e 54 28 4e 2a 31 30 |......R=|INT(N*10|
|000010a0| 30 2b 2e 35 29 2f 31 30 | 30 1f 1f 49 14 27 13 20 |0+.5)/10|0..I.'. |
|000010b0| 01 20 14 05 0d 10 14 01 | 14 09 0f 0e 2c 20 02 15 |. ......|...., ..|
|000010c0| 14 20 17 05 20 03 01 0e | 27 14 20 01 04 04 20 31 |. .. ...|'. ... 1|
|000010d0| 30 30 20 01 0e 04 20 2e | 35 20 14 0f 20 07 05 14 |00 ... .|5 .. ...|
|000010e0| 20 52 3d 49 4e 54 28 4e | 2a 31 30 30 2e 35 29 2f | R=INT(N|*100.5)/|
|000010f0| 31 30 30 20 02 05 03 01 | 15 13 05 20 14 08 01 14 |100 ....|... ....|
|00001100| 27 13 20 0e 0f 14 20 14 | 08 05 20 03 0f 12 12 05 |'. ... .|.. .....|
|00001110| 03 14 20 08 09 05 12 01 | 12 03 08 19 20 0f 06 20 |.. .....|.... .. |
|00001120| 0f 10 05 12 01 14 09 0f | 0e 13 2e 20 4e 20 0d 15 |........|... N ..|
|00001130| 13 14 20 02 05 20 0d 15 | 0c 14 09 10 0c 09 05 04 |.. .. ..|........|
|00001140| 20 02 19 20 31 30 30 20 | 02 05 06 0f 12 05 20 17 | .. 100 |...... .|
|00001150| 05 20 01 04 04 20 2e 35 | 2e 1f 1f 53 09 0e 03 05 |. ... .5|...S....|
|00001160| 20 31 30 30 20 01 10 10 | 05 01 12 13 20 14 17 09 | 100 ...|.... ...|
|00001170| 03 05 20 09 0e 20 14 08 | 05 20 06 0f 12 0d 15 0c |.. .. ..|. ......|
|00001180| 01 2c 20 0c 05 14 27 13 | 20 01 13 13 09 07 0e 20 |., ...'.| ...... |
|00001190| 01 20 16 01 12 09 01 02 | 0c 05 20 0e 01 0d 05 20 |. ......|.. .... |
|000011a0| 48 20 28 08 15 0e 04 12 | 05 04 29 20 14 0f 20 09 |H (.....|..) .. .|
|000011b0| 14 2e 1f 1f 48 3d 31 30 | 30 3a 52 3d 49 4e 54 28 |....H=10|0:R=INT(|
|000011c0| 4e 2a 48 2b 2e 35 29 2f | 48 1f 1f 48 05 12 05 27 |N*H+.5)/|H..H...'|
|000011d0| 13 20 01 20 10 12 0f 07 | 12 01 0d 20 14 08 01 14 |. . ....|... ....|
|000011e0| 20 03 0f 0d 10 15 14 05 | 13 20 14 08 05 20 01 16 | .......|. ... ..|
|000011f0| 05 12 01 07 05 20 10 12 | 09 03 05 20 14 0f 20 14 |..... ..|... .. .|
|00001200| 08 05 20 0e 05 01 12 05 | 13 14 20 03 05 0e 14 20 |.. .....|.. .... |
|00001210| 17 08 05 0e 20 17 05 20 | 02 15 19 20 01 20 03 05 |.... .. |... . ..|
|00001220| 12 14 01 09 0e 20 11 15 | 01 0e 14 09 14 19 20 0f |..... ..|...... .|
|00001230| 06 20 05 07 07 13 2c 20 | 13 03 12 05 17 13 2c 20 |. ...., |......, |
|00001240| 0f 12 20 17 08 01 14 05 | 16 05 12 2e 20 49 14 20 |.. .....|.... I. |
|00001250| 15 13 05 13 20 0f 15 12 | 20 0e 05 17 20 12 0f 15 |.... ...| ... ...|
|00001260| 0e 04 09 0e 07 20 06 0f | 12 0d 15 0c 01 2e 1f 1f |..... ..|........|
|00001270| 31 30 20 50 52 49 4e 54 | 22 1b 43 4c 52 1d 22 1f |10 PRINT|".CLR.".|
|00001280| 32 30 20 49 4e 50 55 54 | 22 20 48 4f 57 20 4d 41 |20 INPUT|" HOW MA|
|00001290| 4e 59 20 54 4f 20 42 55 | 59 22 3b 5a 1f 33 30 20 |NY TO BU|Y";Z.30 |
|000012a0| 50 52 49 4e 54 22 1b 44 | 4e 1d 1b 53 50 43 1d 50 |PRINT".D|N..SPC.P|
|000012b0| 52 49 43 45 20 46 4f 52 | 22 5a 22 3b 1f 34 30 20 |RICE FOR|"Z";.40 |
|000012c0| 49 4e 50 55 54 22 50 49 | 45 43 45 53 22 3b 50 1f |INPUT"PI|ECES";P.|
|000012d0| 35 30 20 4e 3d 50 2f 5a | 3a 20 52 45 4d 20 41 43 |50 N=P/Z|: REM AC|
|000012e0| 43 55 52 41 54 45 20 50 | 49 45 43 45 20 50 52 49 |CURATE P|IECE PRI|
|000012f0| 43 45 1f 36 30 20 48 3d | 31 30 30 3a 20 52 3d 49 |CE.60 H=|100: R=I|
|00001300| 4e 54 28 4e 2a 48 2b 2e | 35 29 2f 48 3a 20 52 45 |NT(N*H+.|5)/H: RE|
|00001310| 4d 20 53 50 45 43 49 41 | 4c 49 5a 45 44 20 52 4f |M SPECIA|LIZED RO|
|00001320| 55 4e 44 49 4e 47 20 46 | 4f 52 4d 55 4c 41 1f 37 |UNDING F|ORMULA.7|
|00001330| 30 20 50 52 49 4e 54 3a | 50 52 49 4e 54 22 20 41 |0 PRINT:|PRINT" A|
|00001340| 56 47 2e 20 50 52 49 43 | 45 20 45 41 2e 20 3d 22 |VG. PRIC|E EA. ="|
|00001350| 52 1f 1f 41 0e 0f 14 08 | 05 12 20 03 0f 0d 0d 0f |R..A....|.. .....|
|00001360| 0e 20 15 13 05 20 06 0f | 12 20 12 0f 15 0e 04 09 |. ... ..|. ......|
|00001370| 0e 07 20 09 13 20 09 0e | 20 13 03 0f 12 09 0e 07 |.. .. ..| .......|
|00001380| 20 07 01 0d 05 13 2e 20 | 57 05 20 03 01 0e 20 03 | ...... |W. ... .|
|00001390| 12 05 01 14 05 20 01 20 | 13 10 05 03 09 01 0c 09 |..... . |........|
|000013a0| 1a 05 04 20 06 0f 12 0d | 15 0c 01 20 14 08 01 14 |... ....|... ....|
|000013b0| 20 15 13 05 13 20 30 20 | 01 13 20 14 08 05 20 16 | .... 0 |.. ... .|
|000013c0| 01 0c 15 05 20 06 0f 12 | 20 44 2c 20 13 09 0e 03 |.... ...| D, ....|
|000013d0| 05 20 17 05 20 17 01 0e | 14 20 0f 15 12 20 12 05 |. .. ...|. ... ..|
|000013e0| 13 15 0c 14 20 12 0f 15 | 0e 04 05 04 20 14 0f 20 |.... ...|.... .. |
|000013f0| 01 20 17 08 0f 0c 05 20 | 0e 15 0d 02 05 12 2c 20 |. ..... |......, |
|00001400| 17 09 14 08 20 0e 0f 20 | 04 05 03 09 0d 01 0c 20 |.... .. |....... |
|00001410| 10 0c 01 03 05 13 2e 1f | 1f 57 05 20 13 14 01 12 |........|.W. ....|
|00001420| 14 20 17 09 14 08 20 0f | 15 12 20 07 05 0e 05 12 |. .... .|.. .....|
|00001430| 01 0c 20 06 0f 12 0d 15 | 0c 01 2e 1f 1f 52 3d 49 |.. .....|.....R=I|
|00001440| 4e 54 28 4e 2a 31 30 1e | 44 2b 2e 35 29 2f 31 30 |NT(N*10.|D+.5)/10|
|00001450| 1e 44 1f 1f 53 15 02 13 | 14 09 14 15 14 05 20 30 |.D..S...|...... 0|
|00001460| 20 06 0f 12 20 44 2e 1f | 1f 52 3d 49 4e 54 28 4e | ... D..|.R=INT(N|
|00001470| 2a 31 30 1e 30 2b 2e 35 | 29 2f 31 30 1e 30 1f 1f |*10.0+.5|)/10.0..|
|00001480| 54 08 09 13 20 19 09 05 | 0c 04 13 20 01 0e 20 09 |T... ...|... .. .|
|00001490| 0e 14 05 12 05 13 14 09 | 0e 07 20 12 05 13 15 0c |........|.. .....|
|000014a0| 14 20 02 01 13 05 04 20 | 0f 0e 20 01 20 13 14 12 |. ..... |.. . ...|
|000014b0| 01 0e 07 05 20 0d 01 14 | 08 05 0d 01 14 09 03 01 |.... ...|........|
|000014c0| 0c 20 12 15 0c 05 3a 20 | 41 0e 19 20 0e 15 0d 02 |. ....: |A.. ....|
|000014d0| 05 12 20 12 01 09 13 05 | 04 20 14 0f 20 14 08 05 |.. .....|. .. ...|
|000014e0| 20 10 0f 17 05 12 20 30 | 20 09 13 20 31 21 20 58 | ..... 0| .. 1! X|
|000014f0| 20 14 0f 20 14 08 05 20 | 10 0f 17 05 12 20 30 20 | .. ... |..... 0 |
|00001500| 09 13 20 31 3b 20 31 34 | 20 14 0f 20 14 08 05 20 |.. 1; 14| .. ... |
|00001510| 10 0f 17 05 12 20 30 20 | 09 13 20 31 3b 20 35 2c |..... 0 |.. 1; 5,|
|00001520| 31 33 37 2c 33 33 35 20 | 14 0f 20 14 08 05 20 10 |137,335 |.. ... .|
|00001530| 0f 17 05 12 20 30 20 09 | 13 20 31 2e 20 54 08 05 |.... 0 .|. 1. T..|
|00001540| 12 05 06 0f 12 05 2c 20 | 31 30 20 14 0f 20 14 08 |......, |10 .. ..|
|00001550| 05 20 10 0f 17 05 12 20 | 30 20 09 13 20 31 2e 1f |. ..... |0 .. 1..|
|00001560| 1f 52 3d 49 4e 54 28 4e | 2a 31 2b 2e 35 29 2f 31 |.R=INT(N|*1+.5)/1|
|00001570| 20 0f 12 20 52 3d 49 4e | 54 28 4e 2b 2e 35 29 1f | .. R=IN|T(N+.5).|
|00001580| 1f 4e 0f 17 20 17 05 20 | 08 01 16 05 20 01 20 0e |.N.. .. |.... . .|
|00001590| 05 17 20 06 0f 12 0d 15 | 0c 01 20 06 0f 12 20 12 |.. .....|.. ... .|
|000015a0| 0f 15 0e 04 09 0e 07 20 | 14 0f 20 17 08 0f 0c 05 |....... |.. .....|
|000015b0| 20 0e 15 0d 02 05 12 13 | 2e 20 4c 05 14 27 13 20 | .......|. L..'. |
|000015c0| 17 12 09 14 05 20 01 20 | 13 08 0f 12 14 20 10 12 |..... . |..... ..|
|000015d0| 0f 07 12 01 0d 20 14 0f | 20 03 01 0c 03 15 0c 01 |..... ..| .......|
|000015e0| 14 05 20 01 16 05 12 01 | 07 05 20 13 08 0f 14 13 |.. .....|.. .....|
|000015f0| 20 10 05 12 20 08 0f 0c | 05 20 09 0e 20 14 08 12 | ... ...|. .. ...|
|00001600| 05 05 20 12 0f 15 0e 04 | 13 20 0f 06 20 07 0f 0c |.. .....|. .. ...|
|00001610| 06 2e 20 4c 05 14 27 13 | 20 01 13 13 15 0d 05 20 |.. L..'.| ...... |
|00001620| 14 08 01 14 20 05 01 03 | 08 20 12 0f 15 0e 04 20 |.... ...|. ..... |
|00001630| 03 0f 0e 13 09 13 14 13 | 20 0f 06 20 31 38 20 08 |........| .. 18 .|
|00001640| 0f 0c 05 13 2e 1f 1f 31 | 30 20 50 52 49 4e 54 22 |.......1|0 PRINT"|
|00001650| 1b 43 4c 52 1d 1b 42 4c | 4b 1d 1b 44 4e 1d 41 53 |.CLR..BL|K..DN.AS|
|00001660| 53 55 4d 49 4e 47 20 31 | 38 2d 48 4f 4c 45 20 43 |SUMING 1|8-HOLE C|
|00001670| 4f 55 52 53 45 1b 44 4e | 1d 22 1f 32 30 20 49 4e |OURSE.DN|.".20 IN|
|00001680| 50 55 54 22 20 46 49 52 | 53 54 20 52 4f 55 4e 44 |PUT" FIR|ST ROUND|
|00001690| 22 3b 52 31 1f 33 30 20 | 49 46 52 31 3c 3e 49 4e |";R1.30 |IFR1<>IN|
|000016a0| 54 28 52 31 29 54 48 45 | 4e 47 4f 53 55 42 32 30 |T(R1)THE|NGOSUB20|
|000016b0| 30 3a 20 47 4f 54 4f 32 | 30 1f 34 30 20 5a 3d 52 |0: GOTO2|0.40 Z=R|
|000016c0| 31 3a 47 4f 53 55 42 33 | 30 30 1f 35 30 20 49 4e |1:GOSUB3|00.50 IN|
|000016d0| 50 55 54 22 20 53 45 43 | 4f 4e 44 20 52 4f 55 4e |PUT" SEC|OND ROUN|
|000016e0| 44 22 3b 52 32 1f 36 30 | 20 49 46 52 32 3c 3e 49 |D";R2.60| IFR2<>I|
|000016f0| 4e 54 28 52 32 29 54 48 | 45 4e 47 4f 53 55 42 32 |NT(R2)TH|ENGOSUB2|
|00001700| 30 30 3a 20 47 4f 54 4f | 35 30 1f 37 30 20 5a 3d |00: GOTO|50.70 Z=|
|00001710| 52 32 3a 47 4f 53 55 42 | 33 30 30 1f 38 30 20 49 |R2:GOSUB|300.80 I|
|00001720| 4e 50 55 54 22 20 54 48 | 49 52 44 20 52 4f 55 4e |NPUT" TH|IRD ROUN|
|00001730| 44 22 3b 52 33 1f 39 30 | 20 49 46 52 33 3c 3e 49 |D";R3.90| IFR3<>I|
|00001740| 4e 54 28 52 33 29 54 48 | 45 4e 47 4f 53 55 42 32 |NT(R3)TH|ENGOSUB2|
|00001750| 30 30 3a 20 47 4f 54 4f | 38 30 1f 31 30 30 20 5a |00: GOTO|80.100 Z|
|00001760| 3d 52 33 3a 47 4f 53 55 | 42 33 30 30 1f 31 31 30 |=R3:GOSU|B300.110|
|00001770| 20 54 53 3d 52 31 2b 52 | 32 2b 52 33 3a 50 52 49 | TS=R1+R|2+R3:PRI|
|00001780| 4e 54 22 20 54 4f 54 41 | 4c 20 53 48 4f 54 53 20 |NT" TOTA|L SHOTS |
|00001790| 46 4f 52 20 33 20 52 4f | 55 4e 44 53 3a 22 54 53 |FOR 3 RO|UNDS:"TS|
|000017a0| 1f 31 32 30 20 4e 3d 54 | 53 2f 35 34 3a 52 45 4d |.120 N=T|S/54:REM|
|000017b0| 20 35 34 20 48 4f 4c 45 | 53 20 49 4e 20 33 20 52 | 54 HOLE|S IN 3 R|
|000017c0| 4f 55 4e 44 53 1f 31 33 | 30 20 52 3d 49 4e 54 28 |OUNDS.13|0 R=INT(|
|000017d0| 4e 2b 2e 35 29 3a 52 45 | 4d 20 53 50 45 43 49 41 |N+.5):RE|M SPECIA|
|000017e0| 4c 49 5a 45 44 20 52 4f | 55 4e 44 49 4e 47 20 46 |LIZED RO|UNDING F|
|000017f0| 4f 52 4d 55 4c 41 1f 31 | 34 30 20 50 52 49 4e 54 |ORMULA.1|40 PRINT|
|00001800| 3a 50 52 49 4e 54 22 20 | 41 56 47 2e 20 53 48 4f |:PRINT" |AVG. SHO|
|00001810| 54 53 20 50 45 52 20 48 | 4f 4c 45 20 46 4f 52 20 |TS PER H|OLE FOR |
|00001820| 33 20 52 4f 55 4e 44 53 | 3a 22 52 1f 31 35 30 20 |3 ROUNDS|:"R.150 |
|00001830| 45 4e 44 1f 32 30 30 20 | 50 52 49 4e 54 3a 50 52 |END.200 |PRINT:PR|
|00001840| 49 4e 54 22 20 4e 4f 20 | 44 45 43 49 4d 41 4c 53 |INT" NO |DECIMALS|
|00001850| 2c 20 50 4c 45 41 53 45 | 21 1f 32 31 30 20 50 52 |, PLEASE|!.210 PR|
|00001860| 49 4e 54 3a 52 45 54 55 | 52 4e 1f 33 30 30 20 4e |INT:RETU|RN.300 N|
|00001870| 3d 5a 2f 31 38 3a 52 45 | 4d 20 31 38 20 48 4f 4c |=Z/18:RE|M 18 HOL|
|00001880| 45 53 20 50 45 52 20 52 | 4f 55 4e 44 1f 33 31 30 |ES PER R|OUND.310|
|00001890| 20 52 3d 49 4e 54 28 4e | 2b 2e 35 29 3a 20 52 45 | R=INT(N|+.5): RE|
|000018a0| 4d 20 53 50 45 43 49 41 | 4c 49 5a 45 44 20 52 4f |M SPECIA|LIZED RO|
|000018b0| 55 4e 44 49 4e 47 20 46 | 4f 52 4d 55 4c 41 1f 33 |UNDING F|ORMULA.3|
|000018c0| 32 30 20 50 52 49 4e 54 | 3a 50 52 49 4e 54 22 20 |20 PRINT|:PRINT" |
|000018d0| 41 56 47 2e 20 53 48 4f | 54 53 20 50 45 52 20 48 |AVG. SHO|TS PER H|
|000018e0| 4f 4c 45 3a 22 52 1f 33 | 33 30 20 50 52 49 4e 54 |OLE:"R.3|30 PRINT|
|000018f0| 3a 52 45 54 55 52 4e 1f | 1f 47 0f 0c 06 20 13 03 |:RETURN.|.G... ..|
|00001900| 0f 12 05 13 20 04 0f 0e | 27 14 20 03 0f 0e 14 01 |.... ...|'. .....|
|00001910| 09 0e 20 04 05 03 09 0d | 01 0c 20 16 01 0c 15 05 |.. .....|.. .....|
|00001920| 13 2c 20 13 0f 20 0c 09 | 0e 05 13 20 33 30 2c 20 |., .. ..|... 30, |
|00001930| 36 30 2c 20 01 0e 04 20 | 39 30 20 03 08 05 03 0b |60, ... |90 .....|
|00001940| 20 06 0f 12 20 14 08 09 | 13 20 02 19 20 03 0f 0d | ... ...|. .. ...|
|00001950| 10 01 12 09 0e 07 20 14 | 08 05 20 49 4e 50 55 54 |...... .|.. INPUT|
|00001960| 20 0e 15 0d 02 05 12 13 | 20 17 09 14 08 20 14 08 | .......| .... ..|
|00001970| 05 09 12 20 09 0e 14 05 | 07 05 12 20 16 01 0c 15 |... ....|... ....|
|00001980| 05 13 2e 20 49 06 20 14 | 08 05 19 27 12 05 20 0e |... I. .|...'.. .|
|00001990| 0f 14 20 14 08 05 20 13 | 01 0d 05 2c 20 01 20 04 |.. ... .|..., . .|
|000019a0| 05 03 09 0d 01 0c 20 16 | 01 0c 15 05 20 0d 15 13 |...... .|.... ...|
|000019b0| 14 20 08 01 16 05 20 02 | 05 05 0e 20 05 0e 14 05 |. .... .|... ....|
|000019c0| 12 05 04 2c 20 01 0e 04 | 20 14 08 05 20 11 15 05 |..., ...| ... ...|
|000019d0| 13 14 09 0f 0e 13 20 01 | 12 05 20 12 05 10 05 01 |...... .|.. .....|
|000019e0| 14 05 04 2e 1f 1f 4c 09 | 0e 05 13 20 34 30 2c 20 |......L.|... 40, |
|000019f0| 37 30 2c 20 01 0e 04 20 | 31 30 30 20 01 13 13 09 |70, ... |100 ....|
|00001a00| 07 0e 20 01 0e 0f 14 08 | 05 12 20 16 01 0c 15 05 |.. .....|.. .....|
|00001a10| 20 5a 20 06 0f 12 20 52 | 31 2c 20 52 32 2c 20 01 | Z ... R|1, R2, .|
|00001a20| 0e 04 20 52 33 20 09 0e | 20 13 15 03 03 05 13 13 |.. R3 ..| .......|
|00001a30| 09 0f 0e 2c 20 13 0f 20 | 0f 0e 05 20 13 15 02 12 |..., .. |... ....|
|00001a40| 0f 15 14 09 0e 05 20 01 | 14 20 0c 09 0e 05 13 20 |...... .|. ..... |
|00001a50| 33 30 30 2d 33 33 30 20 | 28 14 0f 20 03 01 0c 03 |300-330 |(.. ....|
|00001a60| 15 0c 01 14 05 20 01 16 | 05 12 01 07 05 20 13 08 |..... ..|..... ..|
|00001a70| 0f 14 13 20 10 05 12 20 | 08 0f 0c 05 29 20 03 01 |... ... |....) ..|
|00001a80| 0e 20 02 05 20 15 13 05 | 04 20 12 05 10 05 01 14 |. .. ...|. ......|
|00001a90| 05 04 0c 19 2e 1f 1f 54 | 08 05 20 12 0f 15 0e 04 |.......T|.. .....|
|00001aa0| 09 0e 07 20 06 0f 12 0d | 15 0c 01 2c 20 03 15 13 |... ....|..., ...|
|00001ab0| 14 0f 0d 2d 14 01 09 0c | 0f 12 05 04 20 06 0f 12 |...-....|.... ...|
|00001ac0| 20 17 08 0f 0c 05 20 0e | 15 0d 02 05 12 13 2c 20 | ..... .|......, |
|00001ad0| 09 13 20 15 13 05 04 20 | 09 0e 20 0c 09 0e 05 20 |.. .... |.. .... |
|00001ae0| 33 31 30 20 14 0f 20 12 | 0f 15 0e 04 20 13 03 0f |310 .. .|.... ...|
|00001af0| 12 05 13 20 14 0f 20 16 | 01 0c 15 05 13 20 14 08 |... .. .|..... ..|
|00001b00| 01 14 20 03 0f 0e 14 01 | 09 0e 20 0e 0f 20 04 05 |.. .....|.. .. ..|
|00001b10| 03 09 0d 01 0c 13 2e 1f | 1f 54 08 09 13 20 10 12 |........|.T... ..|
|00001b20| 0f 07 12 01 0d 2c 20 47 | 0f 0c 06 20 53 03 0f 12 |....., G|... S...|
|00001b30| 05 13 2c 20 03 01 0e 20 | 02 05 20 06 0f 15 0e 04 |.., ... |.. .....|
|00001b40| 20 0f 0e 20 14 08 05 20 | 06 0c 09 10 20 13 09 04 | .. ... |.... ...|
|00001b50| 05 20 0f 06 20 14 08 09 | 13 20 04 09 13 0b 2e 1f |. .. ...|. ......|
|00001b60| 1f 1f 47 01 1a 05 14 14 | 05 2c 20 4a 15 0c 19 20 |..G.....|., J... |
|00001b70| 31 39 39 34 1f 1f       |                         |1994..  |        |
+--------+-------------------------+-------------------------+--------+--------+